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Preface 


This manual explains, for users of the Time Sharing Option (TSO) of the 
Operating System (OS), how to invoke the OS PL/I Optimizing Compiler and 
use its conversational I/0 capabilities. The manual should be read in 
conjunction with the OS TSO Terminal User's Guide, Order No. GC28-6763, 
and OS TSO Command Lanquage Reference, Order No. GC28-6732, which 
provide essential information on how to control a terminal session, how 
to enter commands and other input, and how to handle data sets. 


The PL/I language implemented by the optimizing compiler is described in 


the OS PL/I Optimizing and Checkout Compilers: Lanquage Reference 
Manual, Order No. SC33-0009. 


Essential information about the optimizing compiler and the operating 
system is provided in the OS PL/I Optimizing Compiler: Programmer's 
Guide, Order No. SC33-0006. The programmer's guide also gives 
information about submission of an Authorized Program Analysis Report 
(APAR) in the event of a suspected malfunctioning of the compiler. 





The manual is divided into two parts. The first part is a guide to using 
the compiler in a TSO environment. It comprises the following sections: 


e Introduction 

e Running a PL/I Program -- this describes how to invoke the compiler, 
and indicates other TSO facilities that can be used when processing a 
PL/I program. 


° PL/I Prompter -- this describes the interface program used to invoke 
the compiler in a TSO environment. 


e Conversational I/O -- this describes the special considerations for 
PL/I files transmitted to and from the terminal. 


The second part is a description of the PLI command. This is the basic 


reference source for the command that is directly associated with the 
optimizing compiler. 


Second Edition (April 1972) 





This is a Major revision of, and obsoletes, SC33-0029-0. Changes 
are indicated by a vertical line to the left of the change. 


This edition applies to Release 1.1 of the OS PL/I 
Optimizing Compiler and to all subsequent releases until 
otherwise indicated in new editions or Technical 
Newsletters. Changes will continually be made to the 
information herein; before using this publication in 
connection with the operation of IBM systems, consult 
the latest IBM System/360 and System/370 Bibliography 
SRL Newsletter, Order No. GN20-0360, for the editions 
that are applicable and current. 


Requests for copies of IBM publications should be made to 
your IBM representative or the IBM branch office serving 
your locality. 


A form for reader's comments is provided at the back of 
this publication. If the form has been removed, comments 
may be addressed to IBM United Kingdom Laboratories 

Ltd., Programming Publications, Hursley Park, Winchester, 
Hampshire, England. Comments become the property of IBM. 
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Introduction 


The PL/I Optimizing Compiler translates PL/I source programs into IBM 
System/360 and System/370 machine instructions. It can be used in 
either the batch or TSO environments of the operating system (0S). 


The standard command for invoking the optimizing compiler during a TSO 
session is PLI. Alternatively the RUN command can be used. Both 
commands invoke an interface program known as the PL/I Prompter to 
establish compiler options, allocate data sets, and then invoke the 
compiler itself. After compilation, other commands can be used to link- 
edit and execute the PL/I program. You can communicate with the PL/I 
program when it is being executed by using the conversational 1/0 
feature of PL/I. 





























Running aiPL/I Program 





This section describes, with examples, how to use the PLI command and 
giscusses the other commands that can be used to prepare and run a PL/I 
program with the optimizing compiler. 


Chapter 1 of the programmer*s guide for the optimizing compiler 
introduces the operating system, jobs, job control language, and 
cataloged procedures. 


Chapter 4 of the programmer's guide describes the basic functions of the 
compiler, the data sets it requires, and the listings it produces. 


Preparation 


The following actions must be taken before processing the PL/I program: 
41. Start the terminal session using the LOGON command. 


2. Create the primary input data set, containing the PL/I program, using 
the EDIT command. 


LOGON Command 


The LOGON command is used to start a terminal session. Each session is 
regarded as a job by the operating system. The job control language 
(JCL) statements defining a session must be in the form of a cataloged 
procedure. This procedure is known as a LOGON procedure and is specified 
implicitly or explicitly in the LOGON command. TSO constructs a JOB 
statement, and an EXEC statement to invoke the cataloged procedure, from 
the information provided in the LOGON command. 


IBM supplies a standard LOGON procedure, named PLIXLGN, for use with the 
optimizing compiler (see figure 1), so it is unlikely that you will need 
to write one yourself. However, you should be aware of its contents. 


A LOGON procedure comprises one EXEC statement and a number of DD 
statements. The EXEC statement usually invokes the TSO terminal monitor 
program which analyses each command entered and passes control to the 
appropriate command processor (the PL/I prompter, for example). A DD 
statement either explicitly defines a data set to be allocated at the 
beginning of the session or contains the single parameter DYNAM, which 
only causes a control block to be reserved. 


There must be one such control block for each data set that is allocated 
dynamically, at any one time during the session. Data sets are 
dynamically allocated by the ALLOCATE command or by a command processor 
such as the PL/I prompter. All types of allocation can be freed by using 
the FREE command. In addition, data sets allocated by command processors 
will be freed by TSO if the corresponding command has been completed and 
a control block is required for a new allocation. 


The single parameter TERM=TS can be used in one or more DD statements in 
the LOGON procedure to allocate the corresponding file to the terminal. 
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|77PLIXLGN PROC ~ 
|77CT01 EXEC PGM=IKJEFTO01 ‘TERMINAL MONITOR PROGRAM 


|7/DD1 DD DYNAM DATA SETS FOR 
|77DD2 DD DYNAM 

|77DD3 DD DYNAM DYNAMIC 

|77DD4 DD DYNAM 

|7/7DD5 DD DYNAM ALLOCATION BY 
|77DD6 DD DYNAM 

|7/DD7 DD DYNAM COMMAND PROCESSORS 
|7/DD8 DD ‘DYNAM 

|77DD9 DD DYNAM AND USER 


|77DD10 DD DYNAM 
| 7/SYSIN DD TERM=TS STANDARD INPUT AND OUTPUT FILES 
ea DD TERM=TS ALLOCATED TO TERMINAL 


a ss se es es es ee es ee 


Figure 1. Standard, IBM-supplied, LOGON procedure for using the PL/I 
optimizing compiler. This procedure assumes that the PL/I 
prompter is available in the TSO command processor library, 
SYS1.CMDLIB, and that the PL/I optimizing compiler and the PL/I 
resident and transient libraries are in the system link 
library. The PROC statement serves only as a means of 
identifying the procedure. 


EDIT Command 


The EDIT command is used to create and update the primary input data set 
for the optimizing compiler. This command can produce two types of PL/I 
primary input data set. If the PLI operand is specified in the EDIT 
command, the records are V-format, with a maximum length of 104 bytes. 
If the PLIF operand is specified, the records are F-format, with a 
length of 80 bytes. Both types have the descriptive qualifier PLI (see 
"Data Set Naming Conventions" later) and both are accepted as input to 
the optimizing compiler. 


Unless you specify the NONUM operand, TSO will include a sequence number 
in each line. The 5 low-order digits of this number are printed, as a 
prompt, at the beginning of each new line of input. Normally, the 
sequence numbers will start at 00000010 and increase by 10 for each 
line. If the PLI operand is specified, the number is placed in columns 
1 through 8 in the source input. If the PLIF operand is specified, the 
number is placed in columns 73 through 80 in the source input. 


If the NUMBER option applies when the program is compiled, these 

sequence numbers are used to derive the statement numbers in any 

listings produced, unless you explicitly specify otherwise in the 
SEQUENCE option. 


The TSO sequence numbers should normally not affect the way you enter 
the program because, when the PLI operand is used, the default values 
for the MARGINS option will be automatically increased by 8 and any 
PROCESS control statements should begin immediately after the sequence 
number. 


Secondary Input Data Sets: Source text included by %INCLUDE statements 
must have F-format records. Consequently, it is preferable to use F- 
format records for the primary input also. If the primary input has v- 
format records, you will need to take special action to avoid errors 
during translation caused by the different positions used by TSO for 
source text and sequence numbers. For instance, you can omit sequence 
numbers from the input data sets by specifying the NONUM operand in the 























EDIT commands (the preprocessor will still generate sequence numbers for 
“use with the NUMBER compiler option). Alternatively, if you include 
sequence numbers, either ensure that they are in the same positions in | 
both primary and secondary input, or use the STMT compiler option to 
Suppress the use of sequence numbers by the compiler. 
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Alternatively, you can use the RUN command to compile, link-edit, and 
execute in one operation. 


Figure 2. Selecting commands for processing a PL/I program 


Processing 


The optimizing compiler can be invoked via a PLI or RUN command. If you 
use the PLI command, you will also need to use the LINK command plus the 
CALL command, or just the LOADGO command, to link-edit and execute the 
object module produced during compilation. If you use the RUN command, 
link-editing and execution will normally follow automatically after 
compilation. When using either PLI or RUN, you may also need to use the 
ALLOCATE command to allocate data sets for use during execution. 


The different characteristics of each of these commands are summarized 
below, followed by examples of using them. The PLI command is fully 
described in Part 2 of this manual. The other commands are described in 
OS TSO Command Lanquage Reference. Figure 2 illustrates how to choose 
the most suitable method of processing the PL/I program. 
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- PLI Command 





_ The PLI command is the standard method of invoking the optimizing 

compiler. ‘The command invokes the compiler via the PL/I prompter. You 
Can specify compiler options, the PRINT/NOPRINT operand to control the 
SYSPRINT output file, and the LIB operand to specify secondary input 
data sets for the preprocessor. 


When the program has been compiled successfully, you can use either the 
LINK command plus the CALL command, or just the LOADGO command, to link- 
edit and execute the program (see below). 


RUN Command 


You can use a RUN command in place of the PLI and LOADGO commands. It 
aiso invokes the optimizing compiler via the PL/I prompter, but then 
continues to link-edit and execute the resultant object module. The RUN 
command imposes the following restrictions on the use of the compiler. 


s The only compiler option that can be specified is LMSG/SMSG. 


e There is no PRINT operand, thus the prompter will allocate SYSPRINT 
as a dummy data set. (See "Data Set Allocation", later) 


e There is no LIB operand, thus you cannot specify secondary input data 
sets in the command. However, you can still allocate a secondary 
input data set with an ALLOCATE command, and this allocation will be 
recognized. 


e The primary input data set must have V-format records with a maximum 
length of 104 bytes. This format will apply if you have specified the 
PLI operand in the EDIT command when creating the data set. 


The OPT operand may be included in the RUN command to indicate use of 
the PL/I optimizing compiler, but it can be omitted since it is the 
default. The PLI operand must also be included if the primary input data 
set name does not have the descriptive qualifier PLI (see "Data Set 
Naming Conventions" later). 


A parameter can be included to specify execution-time options and an 
argument for the main procedure of the PL/I program; a slash (/) 
Separates these two parts. 


RUN can also be used as a subcommand of the EDIT command. Used in this 
way it may have advantages if you expect to do a lot of permanent 
updating to the primary input, because you do not have to store the data 
set and leave edit mode to process the PL/I program. 


Note: If you use the RUN subcommand, approximately 30K bytes of the 
region will be reserved for the EDIT routines; it will not be available 
to the optimizing compiler, loader, or PL/I program. 


LINK Command 


The LINK command invokes the linkage editor via an interface program 
which allocates the data sets required. Chapter 5 of the programmer's 
guide describes the linkage editor in relation to the optimizing 
compiler. 


10 

















In the LINK command you will need to specify: 


1. The names of the object modules that are to be link-edited. These are 
specified as a list after the keyword LINK. 


2. The name to be assigned to the resultant load module. This is 
specified in the LOAD operand. 


3. The name of the PL/I resident library to be used. This is usually 
specified as the keyword PLIBASE. However, if you are including, in 
the load module, a link-edit stub produced by the PL/I checkout 
compiler, then an alternative library can be specified with the 
keyword PLICMIX. This will reduce the amount of main storage 
required. 


Other operands can be used to specify additional input sources, linkage 
editor control statements, and linkac2 editor options. 


CALL Command 


The main purpose of the CALL command with PL/I programs is to invoke the 
load module produced by the linkage editor from one or more object 
modules that were produced during compilation. A parameter can be 
included in the command to specify execution-time options and an 
argument for the main procedure of the PL/I program; a slash (/) 
separates these two parts. 


The CALL command can also be used to invoke the optimizing compiler 
directly. The membername for the PL/I optimizing compiler is IELOAA. 
Because the prompter is not used you must allocate all data sets 
yourself either by the LOGON procedure or by ALLOCATE commands. 


LOADGO Command 


The LOADGO command invokes the loader via an interface program which 
allocates the data sets required. Chapter 5 of the programmer's guide 
describes the loader in relation to the optimizing compiler. 


In the LOADGO command you will need to specify: 


1. The names of the object modules that are to be link-edited. These 
are specified as a list after the keyword LOADGO. This list can also 
include load modules produced by previous link-edit operations. 


2. The name of the PL/I resident library to be used. This is usually 
specified as the keyword PLIBASE. However, if you are including, in 
the input to the loader, a link-edit stub produced by the PL/I 
checkout compiler (or a load module containing such a link-edit 
stub), then an alternative library can be specified with the keyword 
PLICMIX. This will reduce the amount of main storage required. 


Other operands can be used to specify additional input sources, loader 
options, and a parameter specifying execution-time options and an 
argument to the main procedure of the PL/I program; a slash (/) 
separates the two parts of this parameter. 
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ALLOCATE Command 





When you use the RUN, LOADGO, or CALL command to execute the PL/I 
program you must ensure that all data sets required by the PL/I program 
during execution have been allocated either in the LOGON procedure or by 
ALLOCATE commands; the PL/I prompter will allocate the data sets 
required by the compiler. The data sets that can be defined in ALLOCATE 
commands are listed below. The LISTALC command can be used to request a 
list at the terminal ’of all allocated data sets. 


If you use the standard LOGON procedure PLIXLGN, the standard PL/I files 
SYSIN and SYSPRINT are allocated to the terminal by default. If you 
require different allocations you must use the FREE command and then the 
ALLOCATE command. 


The ALLOCATE command can be used to define the following types of data 
set: 


1. New data sets with CONSECUTIVE organization that are to be kept and 
cataloged in the system catalog, and stored on a direct-access 
device. 


2. New data sets with CONSECUTIVE organization that are to be deleted 
after the execution of the program. 


3. Existing cataloged data sets, with CONSECUTIVE or REGIONAL 
organization, that are stored on a direct-access device. 


4. Data sets that are to be written on a system output device. 

5. Data sets that are to be read from, or written to, your terminal. 

6. Partitioned data sets (also called libraries). 

If the PL/I program creates or accesses INDEXED data sets, or creates a 
REGIONAL data set, or if you want to use magnetic tape devices, the data 
set must be defined in the LOGON procedure. Chapters 6 through 9 of the 
programmer‘s guide contain a full description of the various types of 
data set, though the special considerations for stream files directed to 


or from the terminal are detailed in a later section "Conversational 
ELOm 


Examples 


The following examples illustrate how to use the various commands to 
prepare and process a PL/I program with the optimizing compiler. 
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Example 1: This example illustrates use of the EDIT, PLI, and LOADGO 
commands to create, compile, link-edit, and execute a PL/I program. The 
program reads a series of temperature readings from the terminal, 
calculates the maximum and minimum daily temperatures and the average 
weekly temperatures, and prints the results at the terminal. 


logon 0141 LOGON command 
U141 LOGON IN PROGRESS AT 16:59:48 ON JULY 22, 1971 

NO BROADCAST MESSAGES 

READY 

edit tempcalc pli new EDIT command 
INPUT 

00010 weather: proc options(main); 

00020 dcl n(7,12) fixed dec(3,1); 

00030 get (n); 

00040 put skip edit ("MAXIMUM DAILY TEMPERATURES: ‘ 


’ 
00050 max (n(*,1) ,n(#,2) ,n(*,3) ,n(*,4),n(*,5),n(*,6),n(*,7), PL/I 
00060 n(*, 8) ,n(*,9) ,n(*,10) ,n(*,11),n(*,12))) (r(rem)); 
00070 put skip(2) edit ("MINIMUM DAILY TEMPERATURES: ', source 
00080 min(n(*,1) ,n(*, 2) ,n(*,3),n(*,4),n(*#,5) »n(*,6) ,n(*,7), aera 
00090 n(#,8) ,n(*,9) ,n(*,10) ,n(*,11) ,n(*,12))) (r(rem)); 
00100 put: skip(2) edit ("AVERAGE WEEKLY TEMPERATURE: ‘, 
00110 sum(n)/84) (a,p'--9v.9'); 


00120 rem: format(a,7(p"--9v.9",x(1))); 
00130 end weather; 


te null-line to end input 
aes SAVE subcommand 
Bear END subcommand 

Bit tenoedic . PLI command 


OPTIMIZING COMPILER INVOKED 
PL/I OPTIMIZING V1 R1.1 TIME: 17.08.12 DATE: 14 MAR 72 


COMPILER DIAGNOSTIC MESSAGES OF SEVERITY W AND ABOVE 

ERROR ID L STMT MESSAGE DESCRIPTION 

WARNING DIAGNOSTIC MESSAGES _ . 

IELO859I W 120 ™A* OR *B* FORMAT ITEM INVALID IF USED BY “GET". 
MESSAGES SUPPRESSED BY THE FLAG OPTION: 1 I. 

END OF COMPILER DIAGNOSTIC MESSAGES 


COMPILE TIME 0.19 MINS SPILL FILE: 0 RECORDS, SIZE 3491 
READY 
loadgo tempcalc plibase LOADGO command 
2.4 2.1 2.8 4.5 8.0 11.2 11.8 9.5 7.5 6.1 4.8 3.0 
#:2.1 1.5 0.8 1.0 5.2 7.9 8.0 7.1 5.3 3.1 1.6 0.5 input data with 
+:-0.2 -1.1 -2.0 -1.6 -1.0 1.8 3.2 4.4 4.0 3.3 2.1 1.1 
+:0.3 0.0 1.5 3.8 5.9 8.6 10.0 9.3 8.2 7.0 5.4 3.6 standard prompts 
422.9 2.5 2.7 3.7 5-9 9.0 11.1 10.7 9.9 7.5 6.0 4.5 Feereetslifte 
4#:4.7 5.8 7.4 10.0 13.4 16.3 18.1 17.3 15.2 12.8 8.4 5.9 
#:5.1 4.2 4.9 6.1 7-5 10.8 11.6 11.1 10.1 8.4 5.3 3.8 
itput 
Ro ry WENDAGUREES AGB 18502 aeuertOnO M11e)  1esia nome wae a 
from 
MINIMUM DAILY TEMPERATURES: 2-1 0.5 -2.0 0.0 2.5 4.7 3-8 Si 
AVERAGE WEEKLY TEMPERATURE: 5.9 program 


READY 
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Example 2: This example illustrates use of the EDIT command and RUN 
subcommand to create and run a PL/I program. The program generates a 
Square matrix, made up of each integer value from 1 through the square 
of the side, arranged so that the sums of the values in all horizontal, 
vertical, and the two major diagonal lines are the same. The length of 
the side of the matrix can be any odd number from 3 through 17 and is 
specified as an argument to the main procedure. The generated matrix is 
printed at the terminal. 


logon 0141 LOGON command 
U141 LOGON IN PROGRESS AT 11:01:40 ON JULY 23, 1971 
NO BROADCAST MESSAGES 

READY 

edit msquare pli new 

INPUT 

00010 (stringsize): square: proc(size) options(main); 
00020 on stringsize go to bb; 

00030 del size char(2) var; 

00040 n=size; 

00050 aa: if n>17|n<3[mod(n,2)=0 then do; 

00060 bb: put ("SIZE INVALID. ENTER AN ODD NUMBER FROM 3 THROUGH ae7scite) 
00070 skip; 

00080 get (n); 

00090 go to aa; 

00100 end; 

00110 begin; 


EDIT command 


00120 del ntab(n,n); 

00130 ntab=0; 

00140 i=(n+1)/2; 

00150 j=n; 

00160 m=1; 

00170 do while (m -> n**2); 

00180 if ntab(i,j)=0 then do; PL/I source 
00190 k=i; program 
00200 1=j; 

00210 ntab(i,j)=m; 

00220 m=m+1; 

00230 i=i-1; 

00240 j=j+1; 

00250 if i<1 then i=n; 

00260 if j>n then j=1; 

00270 end; 

00280 else do; 

00290 i=k; 

00300 j=1-1; 

00310 end; 

00320 end; 

00330 put skip edit((ntab(i,*) do i=1 to n)) 

00340 (n(p"zz9",x(1)),skip(2)); 

00350 end; 

3 ee 8 end square; null-line to end input 
EDIT 
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run '/6° opt RUN subcommand 
OPTIMIZING COMPILER INVOKED 
PL/I OPTIMIZING V1 R1.1 TIME: 17.08.12 DATE: 14 MAR 72 


COMPILER DIAGNOSTIC MESSAGES 

ERROR ID L STMT MESSAGE DESCRIPTION 

SEVERE AND ERROR DIAGNOSTIC MESSAGES 

IELO308I S 330 FORMAT LIST INVALID AFTER ‘I,*) DO I=1 TO N)) ('. 
'N(P'ZzZ9",X(1))" IGNORED. 

END OF COMPILER DIAGNOSTIC MESSAGES 


COMPILE TIME 0.03 MINS SPILL FILE: 0 RECORDS, SIZE 3491 
EDIT 

change 340 .n. (n) CHANGE subcommand 
list 340 : LIST subcommand 
00340 ((n) (p"zz9",x(1)),skip(2)); 

run */6° opt RUN subcommand 


OPTIMIZING COMPILER INVOKED 
PL/I OPTIMIZER Vi R1.1 TIME: 17.08.12 DATE: 14 MAR 72 


NO MESSAGES OF SEVERITY W AND ABOVE PRODUCED FOR THIS COMPILATION 
MESSAGES SUPPRESSED BY THE FLAG OPTION: 1 I. 
COMPILE TIME 0.18 MINS SPILL FILE: 13 RECORDS, SIZE 3491 


SIZE INVALID. ENTER AN ODD NUMBER FROM 3 THROUGH 17: 7 _ jnoutdatapreceded by 
program-generated prompt 
20). 1-2 ee Sea St a2 9) 528 
at Spee Soe Soe 27S 
2use Vb 2e Sho 8 265) 28° 10 
output from 


OO AAs 3 25) 1, 9 1 PL/I program 


40 32 24 16 8 7 48 





BAe 235 LoN Ue a) 
22s 2 Poe AS 5 46 38 30 


EDIT 

save SAVE subcommand 
SAVED 

end END subcommand 
READY 
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Example 3: This example illustrates use of the EDIT, PLI, LINK, and CALL 
commands to create, compile, link-edit, and execute a PL/I program. From 
data entered at a terminal the program calculates the variation from 
scheduled d*parture and arrival times for trains running on a railroad 
system. 


The preprocessor is used to include the appropriate timetable into the 
program before ii =. compiled. The timetable is stored as a member named 
TTMOD in a library named TIMELIB. 


The program uses an existing function procedure named DIFF, stored on a 
data set named TIMESUB, to calculate the difference between the 
scheduled and actual times of departure and arrival. 


The timekeeping performance for each train is written on an existing 
REGIONAL(3) data set named TIMEOUT, from where it can subsequently be 
included in a printed report or each record accessed individually by an 
inquiry program. 


logon 0141 LOGON command 
U141 LOGON IN PROGRESS AT 14:32:11 ON JULY 23, 1971 

NO BROADCAST MESSAGES 

READY 

edit timekeep pli new EDIT command 
INPUT 

00010 time: proc options (main); 

00020 %include ttmod; 

00030 del xdate char(7); 

00040 del output env(regional(3)) direct update; 

00050 del diff external entry returns(fixed dec(3)); 

00060 dcl (a1,d1) fixed dec(5,2); 

00070 dcl 1 rec, 


00080 2 route char(2), 

00090 2 (d2,a2) fixed dec(3); 

00100 on endfile(sysin) go to finish; PL/I source 
00110 next: put (‘ENTER DATA:‘) skip(2); program 
00120 get edit(route,d1,al,xdate) 

00130 (a(2),x (1) ,£(5,2),x(1),£(5,2),x(1),a(7)); 


00140 d2=diff(timetab(route,1),d1); 
00150 a2=diff (timetab (route, 2) ,a1); 
00160 put edit(‘DEPARTURE: “,d2,* ARRIVAL: ‘,a2) 


00170 (a(11) ,£(3)); 
00180 write file(output) from(rec) 
00190 keyfrom(xdate| |'000000" | | route); 


00200 go to next; 
00210 finish: end time; 


00220 null-line to end input 
EDIT 

save SAVE subcommand 
SAVED 

end END subcommand 
READY 

pli timekeep macro mar(9,72) lib('timelib*') stmt PLI command 


OPTIMIZING COMPILER INVOKED 

PL/I OPTIMIZER V1 R1.1 TIME: 17.08.12 DATE: 14 MAR 72 
OPTIONS SPECIFIED 

M,MAR(009,072,000) ,STMT 


NO MESSAGES OF SEVERITY W AND ABOVE PRODUCED FOR THIS COMPILATION 
MESSAGES SUPPRESSED BY THE FLAG OPTION: 2 I. 

COMPILE TIME 0.17 MINS SPILL FILE: Q RECORDS, SIZE 3491 
READY 
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link (timekeep,'timesub') plibase load(opt (time)) LINK command 
READY 
allocate dataset 
READY 

call opt(time) 


ENTER DATA: 08 
DEPARTURE: -30 


ENTER DATA: 02 
DEPARTURE: 0 


ENTER DATA: 06 
DEPARTURE: 0 


ENTER DATA: 01 
DEPARTURE: -15 


ENTER DATA: /* 
READY 


18.15 19.15 22J0L71 


ARRIVAL: 


08.25 09.55 22J0L71 


ARRIVAL: 


13.50 17.45 22JUL71 


ARRIVAL: 


05.35 07.15 223UL71 


ARRIVAL: 


(*timeout") file(output) 


=o) 


— 


-15 


0 


ALLOCATE command 
CALL command 


input data preceded by program-generated prompt 
output from PL/I program 


end-of-file mark 
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- PL/I Prompter 





The PL/I prompter is invoked when a PLI command is entered. It is also 
invoked by the RUN command processor when an appropriate RUN command is 
entered (see "RUN command" in the previous section). 


The prompter checks operands and compiler options specified in the PLI 
or RUN command and allocates the data sets required by the optimizing 
compiler. The prompter then passes control to the compiler. 


If you want to terminate the prompter or compiler for any reason, press i 
the ATTN key (or its equivalent). When the response READY is printed you 
can enter another command. 


Messages 


The diagnostic and informatory messages generated by the PL/I prompter 
are explained in the manual OS PL/I Optimizing Compiler Messages. These 
messages are printed with numbers, each beginning IKJ65, if a request to 
include message numbers was made either when your user-identification 
was added to the system or in a subsequent PROFILE command. If a message 
ends with a plus-sign, you can obtain more information by entering a 
question-mark. If a message is followed by the prompt REENTER -, reenter 
the last input with the correction indicated by the message. 


Other messages, generated by TSO, may be printed for errors relating to 
the syntax of the PLI or RUN command. These messages are never numbered 
and are not included in the manual referenced above. The messages are 

of three types: 





1. An informational message ending with the word MISSING. 


2. A prompting message beginning with the word ENTER. You should enter 
the item requested. If the message ends with a plus-sign, you can 
enter a question-mark to obtain: 


3. An additional message providing more information about the item to be 
entered. 


Data Set Allocation 


Figure 3 lists which data sets the PL/I prompter will allocate, and 
figure 4 indicates how this allocation is performed. 


After compilation has finished, the data sets allocated by the prompter 
will not be freed, but will be marked as "not in use." This status 
avoids the data sets having to be reallocated for any subsequent 
operation which requires a data set with the same name. Alternatively, 
when all control blocks reserved by DD statements with the DYNAM 
parameter are in use, TSO can free the data set to make its control 
block available for another data set. 
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—— oe od 


Data Set When data set will be 
allocated by prompter 


Primary input always 
(SYSIN or SYSCIN) 


4 if any other ddname is specified in the %INCLUDE 
statements, you must allocate the data sets yourself. 


_ 
| 
| 
| 
| 
| 
I 
| 
| 
| 
I 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 
| 
| 
| 
Temporary workfile always | 
(SYSUT1) | 
| 
Compiler listing always (but if the NOPRINT operand | 
(SYSPRINT) applies, a dummy data set is allocated) | 
| 
Object module if OBJECT option | 
(SYSLIN) applies | 
| 
Object module or if DECK, or MACRO plus ie 
preprocessor output in MDECK, options apply | 
card format (SYSPUNCH) | 
I 
Secondary input if LIB operand used | 
to preprocessor and MACRO option applies | 
(SYSLIB+) | 
| 
| 
| 
| 
i 
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Figure 3. Data sets allocated by the PL/I prompter. 


Data Set Naming Conventions 


In order to allocate the compiler‘s data sets, the prompter must have a 
name for each of them, except the temporary data set for SYSUT1. You 
must always specify the name of the primary input data set; the others 
can be omitted, in which case the prompter will assign them names based 
upon the primary input data set name. 


For each data set you can explicitly specify either a fully qualified 
name, or a simple name to which the prompter will add suitable 
qualifiers. These data set naming conventions apply to all TSO 
operations and are described in the OS TSO Terminal User‘s Guide. 

In brief, fully qualified names are specified in single quotation-marks 
and are not modified by the prompter, for example ‘OBJMOD". For simple 
names, the prompter adds the "“user-identification", specified in the 
LOGON command, as a preceding qualifier, and a suitable descriptive name 
as a following qualifier. The former is known as the identification 
qualifier; the latter is known as the descriptive qualifier. 


For most users it should be necessary to specify explicitly only the 
primary input data set name. However, figure 5 indicates how to specify 
all data set names, and the descriptive qualifiers used by the prompter. 


If no name is specified for a data set, the prompter generates a name 
for it by adding the identification and descriptive qualifiers to the 
name of the primary input data set specified in the first operand of the 
PLI command, RUN command, or the EDIT command if you are using the RUN 
subcommand. 
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Data Set SPACE= DISP= Remarks 





SYSIN/SYSCIN = SHR UNIT and SPACE 
already 
established 


SYSUT1 (1024, (60,60)) (NEW , DELETE) 


SYSPRINT (629, (60, 20)) (OLD,KEEP) or if PRINT 
(NEW, CATLG) {(dsname)] used 
TERM=TS parameter supplied if PRINT(*) used 
DUMMY parameter supplied if NOPRINT used 


SYSLIN (400, (50,50)) (OLD, KEEP) or 
(NEW, CATLG) 


SYSPUNCH (400, (50,50)) (OLD,KEEP) or 
(NEW, CATLG) 


already 
established 


Note about DISP parameter: For SYSPRINT, SYSLIN, and SYSPUNCH, 
the prompter first tries to allocate the data set with DISP=(OLD, 
KEEP). This will cause any existing data set with the same name 
to be overwritten by the new one. If the data set name cannot be 
found in the system catalog, the data set is allocated with DISP= 
(NEW, CATLG). 


Note about UNIT parameter: The unit on which a data set is 
allocated is determined by an entry in the User Attribute Data 
Set (UADS). Changes to this data set are made by means of the 
ACCOUNT command, whose use is restricted to TSO users authorized 
by the installation. 


Note about block and record size, record format, and number of 
buffers: The above SPACE allocations are applied only if the data 


set is new. The first argument of the SPACE parameter establishes 
the blocksize. For SYSUT1, SYSPRINT, SYSLIN, and SYSPUNCH, the 
record format, record length, and number of buffers are 
established by the compiler when it opens the data sets; these 
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| 
| 
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; 
| values are listed in chapter 4 of the programmer's guide. 
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Figure 4. How data sets are allocated by the PL/I prompter 


For instance, if the user identification specified in the LOGON command 
is SMITH, then the command 


PLI PROG1 OBJ 


will result in the name SMITH.PROG1.OBJ being generated for the object 
module data set. The qualifiers are added even if you specify a fully 
qualified name. 


Consequently, a fully qualified name used for SYSLIN can be specified as 
a simple name in any subsequent LINK or LOADGO command; the appropriate 
qualifiers will be added automatically. The name of the primary input 
data set should not include any of the qualifiers that the prompter will 
add, as this would result in an invalid qualified name. 
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C 1 
| | 
| File Where to specify Descriptive | 
| data _set name qualifier | 
| in PLI command | 
| | 
| SYSIN/SYSCIN First operand of PLI | 
| PLI command | 
| | 
|SYSLIN Argument of OBJECT OBS | 
| option 
| | 
| SYSPRINT Argument of PRINT LIST | 
| operand | 
| | 
| S¥YSPUNCH Argument of MDECK DECK | 
| or DECK option | 
| | 
| SYSLIB Arguments of LIB none | 
| operand | 
| | 
t------ ------------ ----~------~--- - -- = -- = -- - = - = - +--+ 5 == - = = = = J 


Figure 5. How to specify data sets used by the compiler. You cannot 
specify the temporary workfile SYSUT1. 


If a name is specified for a data set, the prompter attempts to find the 
name in the system catalog. 


If the name exists, that data set is used. It must be on a direct- 
access device and reside on only one volume. You should ensure that 
the volume is mounted before invoking the compiler. If it is a 
partitioned data set, the prompter will assume the member to be used 
is named TEMPNAME unless you explicitly specify a member name with 
the data set name. If the data set is already allocated then that 
allocation is used; the prompter will not attempt to allocate it 
again. The LISTCAT and LISTDS commands can be used to get information 
about data sets in the system catalog. 


If the name does not exist, a new data set is allocated with an entry 
in the system catalog. The name used should not include any of the 
qualifiers that the prompter would add, as this would result in an 
invalid qualified name. 


If you require different allocations to those performed by the prompter, 
then you must specify an existing data set with the required 
characteristics. Remember that a data set exists as soon as it is first 
allocated; it does not have to be used. Thus you can use a data set that 
has been previously allocated as NEW in the LOGON procedure or an 
ALLOCATE command. For example: 

ALLOCATE DATASET(*OBJMOD*) VOL(123456) NEW BLOCK(400) SPACE(10,10) 

PLI PROGI OBJ (*OBJMOD") 

Note that if you wish to allocate a compiler data set yourself by means 
of the ALLOCATE command, you can do so only by specifying the data set 
name; you cannot do so by specifying the file name. For instance, 
ALLOCATE FILE(SYSLIN) DATASET(‘OBJMOD‘) NEW 

PLI PROGi OBJ 

will not result in the object module being written to the data set 
called OBJMOD. 
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Conversational I/O 


The output at the terminal during execution of a PL/I program can 
comprise: 


e Output which is always directed to the terminal. This includes 
messages produced during execution. 


e Data from an output file, in the PL/I program, that is associated 
with a CONSECUTIVE data set allocated to the terminal. 


The input at the terminal can comprise: 


e Data directed to an input file, in the PL/I program, that is 
associated with a CONSECUTIVE data set allocated to the terminal. 


Data sets are allocated to the terminal by use of the DATASET(*) operand 
in the ALLOCATE command, or the TERM=TS parameter in the LOGON 
procedure. If you use the standard LOGON procedure PLIXLGN, the standard 
PL/I files SYSIN and SYSPRINT are allocated to the terminal by default. 


Both stream and record files can be associated with the terminal. 
However, no prompting or synchronization of I/O operations is provided 
for record files; thus you are strongly recommended to use stream files 
wherever possible. 


This section discusses how a PRINT file is formatted at the terminal, 
and the method of transmitting input data from the terminal to a stream 
file in the PL/I program. 


PRINT File Formatting 


Because of the relatively low speed of line-feeding at a terminal, the 
formatting of PRINT files into pages is not normally performed. Three 
lines are always skipped for the PAGE and LINE options and format items, 
and a maximum of three lines are skipped for the SKIP option and format 
item. The ENDPAGE condition is never raised. 


However, you can cause a PRINT file to be formatted at the terminal, in 
the same way as it would on a printer, by declaring a static external 
structure named PLITABS in the PL/I program and initializing an element, 
named NPAGELENGTH, in that structure to the physical page length that is 
to be used for the file. Chapter 7 in the programmer's guide describes 
how to declare the structure PLITABS, which can also be used to change 
the standard tabulating positions for list-directed and data-directed 
output. 


Entering Stream Input Data at the Terminal 


Each time a GET statement is encountered for a file associated with the 
terminal, you will be prompted for the input data as follows: 
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e he terminal skips to position 1 of the next line, prints a colon, 
and then skips to position 1 of the next line. 


You can inhibit this prompting sequence by transmitting, as the last 
output to the terminal before the GET statement, a data item containing 
a colon as its last character, for example: 


PUT FILE(SYSPRINT) SKIP LIST(*ENTER NEXT ITEM:*); 
Two points should be remembered when using this self-prompting feature: 


e The self-prompt must be written as edit-directed data to a PRINT or 
non-PRINT file, or as list-directed data to a PRINT file. The 
quotation-marks enclosing a character-string are not removed from 
list-directed data to a non-PRINT file, thus, in this case, a 
quotation-mark is always the last character. 


e The self-prompt must be written on a file that is actually allocated 
to the terminal. It is not recognized if the file is only being 
copied at the terminal with the MONITOR subcommand. 


After entering the input data, press the RETURN key. The data will then 
be transmitted to the PL/I program. You can delay the transmission of 
the data until two or more lines have been entered by typing a hyphen as 
the last character in a line to be continued. The hyphen is not 
considered as part of the line. One or more lines connected by hyphens 
are known as a logical line. Note that a hyphen and a minus-sign are 
represented by the same character, thus, if a line that is to be 
continued ends in a minus-sign and you omit the hyphen, TSO will assume 
the minus-sign is a hyphen. Thus, it will wait for the next line and 
will have effectively deleted the minus-sign. 


If more data is required to complete the GET statement, a further prompt 
is issued as follows: 


* The terminal prints a plus-sign followed by a colon. 


Input data entered at the terminal should be the same as any stream 
input data, except for the following points: 


e For list-directed and data-directed input, a separating blank or 
comma is not required between data items that are entered on separate 
logical lines. However, the usual semicolon is required at the end of 
data-directed input to indicate that all items have been entered. If 
a semicolon is not entered, you will be prompted for more input. 


e For edit-directed input, the last data item entered on each logical 
line will, if necessary, be padded with blanks, on the right, to the 
length specified in the associated format item. Thus a data item 
cannot span across two logical lines. 


e A SKIP option or format item with an argument greater than 1 has no 
purpose when input is entered from the terminal, because it specifies 
that data not yet entered is to be ignored. Consequently, it ds 
treated as SKIP(1), which means that only data already entered will 
be ignored if not used by a previous GET statement. 


Note also that because the compiler uses backspace characters to 
implement the SKIP(0) option or format item, this option or format 
item should not be used with terminals, such as the IBM 2260, that do 
not have the backspace feature. 


e® A logical line which contains only the two characters 7*, in columns 
4 and 2, is treated as the end-of-file mark. 
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The GET statement can specify the COPY option, but if the COPY file, as 
well the input file, is allocated to the terminal, no copy of the data 
will be printed. Note that SYSPRINT is the default COPY file, and that 
this file is allocated to the terminal by default in the standard LOGON 
procedure PLIXLGN. 


Note: Character-string data is transmitted to the PL/I program as 
entered. If it is to be compared with character-string data in the 
source program, you should ensure that it is in the correct form (that 
is, upper-case or lower-case). If the ASIS operand was specified in the 
EDIT command used to create the source input, any character-strings in 
the source input will be in the same form as entered; otherwise they 
will be in upper-case. : 
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Command Format 





The syntax notation used to illustrate the PLI command in this part of 
the manual is the same as that used in the OS TSO Command Lanquage 
Reference. Briefly, the conventions are as follows: 

Items in brackets [ ] are optional. 


Items in braces { } are alternatives; choose only one. 


An item underlined applies unless an alternative is specified. ' 


Items written in uppercase letters are keywords; the command name must 
be spelled as shown; operands can be shortened by deleting any number . 
of characters on the right, provided the result remains non- 
ambiguous. 


Items written in lowercase letters must be replaced by appropriate names 
or values. 





Separate the command name from the first operand by one or more blanks. 


Separate operands by at least one blank or one comma; though you can add 
any number of extra blanks. 


Special characters ‘()* must be included where shown. 
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PLI Command 


Use the PLI command to invoke the PL/I optimizing compiler. A 
description of the use of this command and the data set naming 
conventions used are given in the earlier section "Running a PL/I 
Program." 


data-set-name 


Loption-list] 


PRINT( (4 * \ I] 
jasnane 
NOPRINT 


{LIB(dslist)] 


data-set-name 
specifies the name of the primary input data set for the 
optimizing compiler. This can be either a fully qualified 
name (enclosed in single quotation marks) or a simple name 
(for which the prompter will add the identification qualifier, 
and the descriptive qualifier PLI). This must be the first 
. operand specified. 


option-list 
specifies one or more compiler options which are to apply 
for this compilation. 


The compiler options that can be specified in a TSO 
environment are described in the following section. They 
are similar to those that can be used in a batch 
environment, but you should note the following extension 
to the DECK, MDECK, and OBJECT options. 


MDECK[(dsname) ] 
5 The parenthesized data set name can be added to specify 
explicitly the name of the data set for SYSPUNCH.* 


» DECK [ (dsname) ] 
The parenthesized data set name can be added to specify 
explicitly the name of the data set for SYSPUNCH. 

This name is ignored if a data set name is also 
specified for the MDECK option. 






OBJECT [ (dsname) ] 
The parenthesized data set name can be added to 
specify explicitly the name of the data set for SYSLIN. 


(enclosed in single quotation marks) or a simple name (for 


& For each data set you can specify a fully qualified name 
which the prompter will add the identification qualifier, and 
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the following descriptive qualifiers: 


DECK for the DECK and MDECK options 
OBJ for the OBJECT option 


If any of these data set names are not specified with the 
options, the prompter will add the identification and 
descriptive qualifiers to the data set name specified in the | 
first operand. 





Separate the options by at least one blank or one comma; 
though you can add any number of extra blanks. The order 
of the options is unimportant. In fact, the PRINT/NOPRINT 
and LIB operands can be interspersed in the option-list; . 
they are recognized by their keywords. If two variants of 

the same option are specified, the first is ignored. 


Options specified in the PLI command can be subsequently 
overridden by options specified on PROCESS compiler 

control statements in the primary input. If the DECK, MACRO, 
MDECK, and OBJECT options are required for any program in a 
batched compilation the option should be specified in the 
PLI command so that the prompter allocates the required 
data sets. The negative forms can then be used on the 
PROCESS statements for the programs that do not require 

the option. 





PRINT (*) 
specifies that the compiler listing, on the SYSPRINT file, 
is to be written at the terminal; no other copy will 
be available. 





PRINT (dsname) ’ 
specifies that the compiler listing, on the SYSPRINT file, 
is to be written on the data set named in parentheses. This 
can be either a fully qualified name (enclosed in single 
quotation marks) or a simple name (for which the prompter 
will add the identification qualifier, and the descriptive 
qualifier LIST). 


If no argument is specified for the PRINT operand, the 
prompter will add the identification and descriptive qualifiers 
to the data set name specified in the first operand. 


NOPRINT 
specifies that the compiler listing is not to be produced ee 
on the SYSPRINT file. You can still get most of the listing 
written at the terminal by using the TERMINAL compiler ‘option. 


LIB(dslist) 
specifies one or more data sets that are to be used as the 
secondary input to the preprocessor. These data sets will 
be concatenated in the order specified and then associated 
with the ddname SYSLIB. If you have specified any other 
ddname in the %INCLUDE statements in the PL/I program, you 
must allocate the data sets associated with that ddname 
yourself. Secondary input must have F-format records, 
even if the primary input has V-format. F-format records 
are created by using the PLIF operand in the EDIT command. & 








The data set names can be either fully qualified (each enclosed 
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PLI Command 


in single quotation marks) or simple names (for which the 
prompter will add the identification qualifier, but no 
descriptive qualifier). 


Separate the data set names by at least one blank or one 
comma; though you can add any number of extra blanks. 


If you use the LIB operand, the MACRO compiler option 
must also apply. 


Example 1 


Operation: Invoke the PL/I optimizing compiler to process a PL/I 


Known: 


program. 


User-identification is ABC 

Data set containing the program is named ABC.UPDATE.PLI 
SYSPRINT file is to be directed to the terminal. 
Default options and data set names are to be used. 


PLI UPDATE PRINT(*) 


Example 2 


Operation: Invoke the PL/I optimizing compiler to process a PL/I 


Known: 


PLI ‘ABC.MATRIX.PLI‘ 


program. 


User-identification is XYZ. 

Data set containing the program is named ABC.MATRIX.PLI 

SYSPRINT file is to be written on a data set named MATLIST. 

MACRO and MDECK options are required, with SYSPUNCH to be 
written on a data set named MATCARD. 

Secondary input to preprocessor to be read from a library 
named XYZ.SOURCE. 

Otherwise default options and data set names are to be used. 





PRINT (‘MATLIST" ) ,MACRO,MDECK ("MATCARD" ) , LIB (SOURCE) 
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Compiler Options 


This section describes the options that can be specified for the PL/I 


optimizing compiler in a TSO environment. The keywords, abbreviations, 


and IBM defaults are listed 


in figure 6. 


a ee eee ee = we a a a nn nn ee es 1 


Compiler Option Keywords 


| AGGREGATE | NOAGGREGATE 

| ATTRIBUTES | NOATTRIBUTES 

| CHARSET 

{| (48|60,EBCDIC| BCD) 

| COMPILE|NOCOMPILE[ (W|E(S)] 
| CONTROL ( "password" ) 


Abbreviations 


AG | NAG 
A|NA 
cs (48|60,EB|B) 


C|NCL(WIE|S) 1] 


| 
IBM Default for| 
TSO Environment | 


NOAGGREGATE 
NOATTRIBUTES 
CHARSET 

(60, EBCDIC) 
NOCOMPILE(S) 


| 

| 

| 

| 

| 

| DECK | NODECK D|ND NODECK | 
| DUMP | NODUMP DU|NDU NODUMP | 
| ESD| NOESD - NOESD | 
| FLAG (1T|WIE[S) F(I(|WIE[S) FLAG (W) | 
[FLOW (n,m) | NOFLOW - NOFLOW | 
| GONUMBER | NOGONUMBER GN|NGN NOGONUMBER | 
| GOSTMT | NOGOSTMT GS|NGS NOGOSTMT | 
| IMPRECISE | NOIMPRECISE IMP | NIMP NOIMPRECISE | 
| INSOURCE | NOINSOURCE IS|NIS INSOURCE | 
| LINECOUNT (n) LC (n) LINECOUNT(55) | 
| LIST |NOLIST - NOLIST | 
| LMESSAGE | SMESSAGE LMSG | SMSG SMESSAGE | 
{MACRO | NOMACRO M|NM NOMACRO | 
| MAP | NOMAP - NOMAP { 
| MARGINI ("c*) |NOMARGINI MI (“c") | NMI NOMARGINI | 
|MARGINS (m,n, Cc) MAR(m,n,c) F-format: | 
| MARGINS (2, 72,1) | 
| V-format: | 
| MARGINS(10,80,0) 
| MDECK | NOMDECK MD |[NMD NOMDECK | 
| NAME ("name ‘) N(“*name") = | 
| NEST | NONEST - NONEST | 
| NUMBER | NONUMBER NUM | NNUM NUMBER | 
| OBJECT | NOOBJECT OBJ | NOBI OBJECT | 
| OFFSET | NOOFFSET OF | NOF NOOFFSET | 
| OPPIMIZE (TIME | 0{ 2) | OPT (TIME| 02) | NOOPTIMIZE | 
| NOOPTIMIZE NOPT | 
| OPTIONS | NOOPTIONS OP | NOP NOOPTIONS | 
| SEQUENCE (m,n) SEQ (m,n) = | 
| SIZE (yyyyyy | yyyK |MAX) SZ (yyyyyy | yyyK| MAX) SIZE (MAX) | 
| SOURCE | NOSOURCE S|NS NOSOURCE | 
| STMT |NOSTMT fo NOSTMT | 
| STORAGE | NOSTORAGE STG|NSTG NOSTORAGE | 
| SYNTAX |NOSYNTAX{ (W|E|S)1 SYN|NSYN((W|E]S)] NOSYNTAX (S) | 
| TERMINAL [ (option-list)]| TERM[ (option-list) ] | TERMINAL | 
NOTERMINAL NTERM | 

| XREF | NOXREF X| NX NOXREF | 
eee ee Ne Se a ees a a oe 


Figure 6. Compiler option keywords, abbreviations, and defaults 
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Compiler Options 


Most options comprise positive and negative forms (the latter beginning 
with NO). The following descriptions usually refer only to the positive 


-form. Unless otherwise stated it can be assumed that the negative form 


suppresses the option. 


The abbreviations listed in figure 6 are the standard abbreviations 
recognized by the optimizing compiler. In addition, the PL/I prompter 
will accept the following standard TSO forms: 


LINECNT for LINECOUNT 

LOAD for OBJECT 

NOLOAD for NOOBJECT 

CHAR 60 for CHARSET(60) 
CHAR48 for CHARSET (48) 
EBCDIC for CHARSET(EBCDIC) 
BCD for CHARSET (BCD) 


Also keywords can be shortened by deleting any number of characters on 


_the right provided the result remains non-ambiguous. As the prompter is 


also used to invoke the PL/I checkout compiler, you must take into 
account the additional options which apply only to the checkout compiler 
(that is, BLOCK, COMPATIBLE, DIAGNOSE, FORMAT, HALT, ISASIZE, RUN, STEP, 
and STEPLINES) when deciding whether an abbreviation is non-ambiguous. 


Each option is considered to be a separate operand and must follow TSO 
Syntax conventions. Thus, in arguments containing two or more items, 
items can be omitted only from the end of the list. The items must be 
separated by one blank or one comma; though any number of additional 
blanks may be added. 


Several of the following options cause tables, etc., to be included in 
the compiler listing that is written on SYSPRINT. A full description of 
this listing is given in the programmer's guide for the optimizing 
compiler. If you wish to have these listings directed to the terminal, 
you can specify them in the TERMINAL option (see TERMINAL in the 
following list). Alternatively, you can specify a PRINT(*) operand in 
the PL/I command, in addition to the list of options. 


AGGREGATE 


The AGGREGATE option specifies that the compiler is to include in the 
compiler listing an aggregate length table, giving the lengths of all 
arrays and major structures in the source program. 


ATTRIBUTES 


The ATTRIBUTES option specifies that the compiler is to include in the 
compiler listing a table of source-program identifiers and their 
attributes. If both ATTRIBUTES and XREF apply, the two tables are 
combined. 
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CHARSET 


The CHARSET option specifies the character set and data code that you 

have used to create the source program. The compiler will accept source 

programs written in the 60-character set or the 48-character set, and in 

the Extended Binary Coded Decimal Interchange Code (EBCDIC) or Binary 

Coded Decimal (BCD). It is unlikely you will ever need to use BCD. The 
48-character set may be required for terminals with a limited character ‘ 
set. 


60-— or 48-Character Set: If the source program is written in the 60- 
Character set, Specify CHARSET(60); if it is written in the 48-character 
set, specify CHARSET(48). The language reference manual for this 
compiler lists both of these character sets. (The compiler will accept 
source programs written in either character set if CHARSET(48) is 
specified, however, if the reserved keywords CAT, LE, etc., are used as 
identifiers, errors may occur.) 


BCD or EBCDIC: If the source program is written in BCD, specify 
CHARSET (BCD); if it is written in EBCDIC, specify CHARSET(EBCDIC). The 
language reference manual for this compiler lists the EBCDIC 
representation of both the 48-character set and the 60-character set. 


If both arguments are specified, they may be in any order. 





COMPILE 


The COMPILE option specifies that the compiler is to compile the source 
program unless an unrecoverable error was detected during preprocessing 
or syntax checking. The NOCOMPILE option without an argument causes 
processing to stop unconditionally after syntax checking. With an 
argument, continuation depends on the severity or errors detected so 
far, as follows: 


NOCOMPILE(W) No compilation if a warning, error, severe error, or 
unrecoverable error is detected. 





NOCOMPILE(E) No compilation if an error, severe error, or 
unrecoverable error is detected. 


NOCOMPILE(S) No compilation if a severe error or unrecoverable error 
is detected. 


CONTROL 


The CONTROL option specifies that any compiler options deleted for your 
installation are to be available for this compilation. You must still 
specify the appropriate keywords to use the options. The CONTROL option 
must be specified with a password that is established for each 
installation; use of an incorrect password will cause processing to be 
terminated. The CONTROL option, if used, must be specified first in the 
list of options. 
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It has the format: 
CONTROL ("password") 


where “password” is a character string, not exceeding eight characters. 


DECK 


The DECK option specifies that the compiler is to produce an object 
module in the form of 80-column card images and store it in the data set 
defined by the DD statement with the name SYSPUNCH. Columns 73-76 of 
each card contain a code to identify the object module; this code 
comprises the first four characters of the first label in the external 
procedure represented by the object module. Columns 77-80 contain a 4- 
digit decimal number: the first card is numbered 0001, the second 0002, 
etc. 


DUMP 


The DUMP option specifies that the compiler is to produce a formatted 
dump of the contents of the registers and main storage used by the 
optimizing compiler if compilation terminates abnormally (usually due to 
an I/O error or compiler error). This dump is written on the data set 
associated with SYSPRINT. Implementation of the DUMP option 
necessitates the use of a considerable amount of main storage by 
routines that handle the dumping. This reduces the storage available 
for compilation which reduces the speed of the compilation. 


ESD 


The ESD option specifies that the external symbol dictionary (ESD) is to 
be listed in the compiler listing. 


FLAG 


The FLAG option specifies the minimum severity of error that requires a 
message to be listed in the compiler listing and at the terminal. The 
possible forms of the FLAG option are: 

FLAG (TI) List all messages. 


FLAG (W) List all except informatory messages. If you specify 
FLAG, FLAG(W) is assumed. 


FLAG (E) List all except warning and informatory messages. 
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FLAG (S) List only severe error and unrecoverable error 
messages. 
FLOW 


The FLOW option specifies that the compiler is to list the transfers of 
control most recently executed in the PL/I program prior to the 
occurrence of an interrupt that results in an execution-time message. 
The format of the FLOW option is: 


FLOW (n,m) 
where: 


*n" is the maximum number of entries to be included in the list. It 
should not exceed 32768. 


=m" is the maximum number of procedures for which the list is to be 
generated. It should not exceed 32768. 


The list will start at the latest information and continue, in reverse 
order of execution, to the point where either limit is exceeded. 


GONUMBER 


The GONUMBER option specifies that the compiler is to produce additional 
information that will allow line numbers from the source program to be 
included in execution-time messages. 


Alternatively, these line numbers can be derived by using the offset 
address, which is always included in execution-time messages, and the 
table produced by the OFFSET option. (The NUMBER option must also 


apply.) 
Use of the GONUMBER option implies NUMBER and NOSTMT. 


GOSTMT 


The GOSTMT option specifies that the compiler is to produce additional 
information that will allow statement numbers from the source program to 
be included in execution-time messages. 


Alternatively, these statement numbers can be derived by using the 
offset address, which is always included in execution-time messages, and 
the table produced by the OFFSET option. (The STMT option must also 


apply.) 
Use of the GOSTMT option implies STMT and NONUMBER. 
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"IMPRECISE 


The IMPRECISE option specifies that the compiler is to include extra 
text in the object module to localize imprecise interrupts when 
executing the program with an IBM System/360 Model 91 or 195. This 
extra text ensures that if interrupts occur, the correct on-units will 
be entered, and that the correct line or statement numbers will appear 
in execution-time messages. 


INSOURCE 


The INSOURCE option specifies that the compiler is to include a listing 
of the source program (including preprocessor statements) in the 
compiler listing. This option is applicable only when the preprocessor 
is used, therefore the MACRO option must also apply. 


LINECOUNT 


The LINECOUNT option specifies the number of lines to be included in 
each page of the compiler listing, including heading lines and blank 
lines. The format of the LINECOUNT option is: 


LINECOUNT (n) 


where "n" is the number of lines. It must be in the range 1 through 
32767, but only headings are generated if you specify less than 7. 


LIST 


The LIST option specifies that the compiler is to include a listing of 
the object module (in a form similar to IBM System/360 assembler 
language instructions) in the compiler listing. 


LMESSAGE 


The LMESSAGE and SMESSAGE options specify that the compiler is to 
produce messages in a long form (specify LMESSAGE) or in a short form 
(specify SMESSAGE). Short messages can have advantages in a TSO 
environment due to the slow printing speed of a terminal. 
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MACRO 


The MACRO option specifies that the source program is to be processed by 
the preprocessor. 


MAP 


The MAP option specifies that the compiler is to produce tables showing 
the organization of the static storage for the object module. These 
tables consist of a static internal storage map and the static external 
control sections. The option also produces a list of variables showing 
their offsets from the start of the storage area. The MAP option is 
normally used with the LIST option. 


MARGINI 


The MARGINI option specifies that the compiler is to include a specified 
character in the column preceding the left hand margin, and the column 
following the right hand margin of the listings resulting from the 
INSOURCE and SOURCE options. Any text in the source input which 
precedes the left hand margin will be shifted left one column, and any 
text that follows the right hand margin will be shifted right one 
column. Thus text outside the source margins can be easily detected. 


The MARGINI option has the format: 
MARGINI("c") 


where “c" is the character to be printed as the margin indicator. 


MARGINS 


The MARGINS option specifies the extent of each input record that 
contains PL/I statements. The compiler will not process data that is 
outside these limits (but it will include it in the source listings). 


The option can also specify the position of an ANS printer control 
character to format the listing produced by the SOURCE option. This is 
an alternative to using %PAGE and %SKIP statements (described in the 
language reference manual for this compiler). If you do not use either 
method, the input records will be listed without any intervening blank 
lines. The format of the MARGINS option is: 


MARGINS (m,n, c) 
where: 
"m" is the column number of the left hand margin. It should not exceed 


104. 
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-*n" is the column number of the right hand margin. It should be 
greater than “m", but not greater than 104. 


mc" is the column number of the ANS printer control character. It 
should not exceed 104 and it should be outside the values specified 
for "m" and “n". Only the following control characters can be used: 


(blank) Skip one line before printing. 


0 Skip two lines before printing. 

‘ = Skip three lines before printing. 
+ Skip no lines before printing. 
1 Start new page. 


If the value "c™ is greater than the maximum length of a source 
statement record the compiler will not be able to recognize it; 
consequently the listing will not have the required format. If the 
character is not a valid printer control character, a blank is assumed 
by default. 


Note: The default value is assumed for any items omitted from the 
argument list. 


@ MDECK 


The MDECK option specifies that the preprocessor is to produce a copy of 

| its output on the file named SYSPUNCH. The last four bytes of the 84 
byte output records are not copied, thus this option allows you to 
retain the output from the preprocessor as a deck of 80-column punched 
cards. 





NAME 


The NAME option specifies that the compiler is to place a linkage-editor 
‘i | NAME statement as the last record of the object module. When processed 
by the linkage editor, this NAME statement indicates that primary input 
is complete and causes the specified name to be assigned to the load 
module created from the preceding input (since any previous NAME 
; statement). 


The NAME option is required if you want the linkage editor to create 
more than one load module from the object modules produced by batched 
compilation. 


If you do not use this option, the linkage editor will use the member 
name specified in the DD statement defining the load module data set. 
You can also use the NAME option to cause the linkage editor to 
substitute a new load module for an existing load module with the same 


© name in the library. 
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The format of the NAME option is: 
NAME (‘* name") 


where "name" has from one through eight characters, and begins with an 
alphabetic character. 





NEST . 


The NEST option specifies that the listing resulting from the SOURCE . 
option will indicate, for each statement, the begin-block level and the 
do-group level. 


NUMBER 


The NUMBER option specifies that the numbers specified in the sequence 
fields in the source input records are to be used to derive the 
statement numbers in the listings resulting from the AGGREGATE, 
ATTRIBUTES, LIST, OFFSET, SOURCE, and XREF options 


The position of the sequence field can be specified in the SEQUENCE 
option. Alternatively, the following default positions are assumed: € 





e First 8 columns for V-format or U-format source input records. In 
this case, 8 is added to the source margins and control character 
position if the MARGINS option is not explicitly specified. . 


e Last 8 columns for F-format source input records. 


These defaults are the positions used for line-numbers generated by TSO; 
thus it is not necessary to specify the SEQUENCE option, or change the 
“MARGINS defaults, when using line-numbers generated by TSO. 


Note that the preprocessor output has fixed-length records irrespective 
of the original primary input. Any sequence numbers in the primary input 
are repositioned in columns 73-80. 


The line-number is calculated from the five right-hand characters of the 

Sequence number (or the number of characters specified, if less than 2 
five). These characters are converted to decimal digits if necessary. 

Each time a line-number is found which is not greater than the preceding 

one, 100000 is added to this and all following line-numbers. 4 


If there is more than one statement on a line, a suffix is used to 
identify the actual statement in the messages. For example, the second 
statement beginning on the line numbered 40 will be identified by the 
number 40.2. The maximum value for this suffix is 31. Thus the thirty- 
first and subsequent statements on a line have the same number. 


| If NONUMBER applies, STMT is implied. NUMBER is implied by NOSTMT or 
GONUMBER. 
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OBJECT 





The OBJECT option specifies that the compiler is to store the object 
module that it creates in the data set associated with the ddname 
SYSLIN. 


OFFSET 


The OFFSET option specifies that the compiler is to include in the 
compiler listing a table of statement or line numbers for each procedure 
with their offset addresses relative to the primary entry point of the 
procedure. This information is of use in identifying the statement 
being executed when an error occurs and neither the GOSTMT nor GONUMBER 
option applies. 


If GOSTMT applies, statement numbers, as well as offset addresses, will 
be included in execution-time messages. If GONUMBER applies, line 


numbers, aS well as offset addresses, will be included in execution-time 
messages. ; 


OPTIMIZE 


The OPTIMIZE option specifies the type of optimization required: 


NOOPTIMIZE specifies maximum compilation speed, but inhibits 
optimization for faster execution and reduced main- 
storage requirements. 


OPTIMIZE(TIME) specifies that the compiler is to optimize the 
machine instructions generated for minimum execution 
time. A secondary effect of this type of 
optimization can be a reduction in the amount of main 
storage required for the object module. The use of 
OPTIMIZE(TIME) could result in a substantial increase 
in compile time over NOOPTIMIZE. 


OPTIMIZE (0) is the equivalent of NOOPTIMIZE. 
OPTIMIZE (2) is the equivalent of OPTIMIZE(TIME). 


The language reference manual for this compiler includes a full 
discussion of optimization. 


OPTIONS 


The OPTIONS option specifies that the compiler is to include, in the 
compiler listing, a list showing the compiler options to be used during 


this compilation. This list includes all options applied by default. 
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SEQUENCE 





The SEQUENCE option specifies the extent of each input record that 
contains a sequence number. This number is included in the source 
distings produced by the INSOURCE and SOURCE options. Also, if the 
NUMBER option applies, line-numbers will be derived from these sequence 
numbers and will be included in the listing in place of statement 
numbers. No attempt is made to sort the input records into the specified 
sequence. The SEQUENCE option has the format: 


SEQUENCE (m,n) 
where: 
"m" specifies the column number of the left hand margin. 
“n™ specifies the column number of the right hand margin. 


The extent specified should not overlap with the source program (as 
Specified in the MARGINS option). 


There is no NOSEQUENCE option and no default. If SEQUENCE is not 
specified but the NUMBER option applies, the position of the sequence 
number is assumed (see the NUMBER option). 


SIZE 


The SIZE option can be used to limit the amount of main storage used by 
the compiler. This is of value, for example, when dynamically invoking 
the compiler, to ensure that space is left for other purposes. 


The SIZE option can be expressed in three forms: 


SIZE(yyyyyyyy) specifies that yyyyyyyy bytes of main storage are to 
be requested. Leading zeros need not be specified. 


SIZE (yyyyyK) specifies that yyyyyK bytes of main storage are to be 
requested (1K=1024). Leading zeros need not be 
specified. 


SIZE (MAX) specifies that the compiler is to obtain as much main 
storage as it can. 


The IBM default, and the most usual value to be used, is SIZE (MAX), 
which permits the compiler to use as much main storage in the region as 
it can. 


When a limit is specified, the amount of main storage used by the 
compiler depends on how the operating system has been generated, and the 
method used for storage allocation. The compiler assumes that buffers, 
data management routines, and processing phases take up a fixed amount 
of main storage, but this amount can vary unknown to the compiler. 

Under MVT, a region of 52K bytes or more is required. 
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After the compiler has loaded its initial phases and opened all 
files, it attempts to allocate space for working storage. If SIZE(MAX) 
is Specified it obtains all space remaining in the region (after 
allowance for subsequent data-management storage areas). If a limit is 
Specified then this amount of storage is requested. If the amount 
available is less than specified, but is more than the minimum workspace 
required, compilation proceeds. If insufficient storage is available, 
compilation is terminated. This latter situation should arise only if 
the region is too small, that is, less than 52K, or if too much space 

for buffers has been requested. The value cannot exceed the main 
Storage available for the job step and cannot be changed after 
processing has begun. This means that, in a batched compilation, the 
value established when the compiler is invoked cannot be changed for 
iater programs in the batch. Thus it is ignored if specified in a 
PROCESS statement. 





An additional 10K to 30K bytes must be allowed for TSO. The actual size 
required for TSO depends on which routines are placed in the link-pack 
area (a common main storage pool available to all regions). Also, if you 
run the compiler in TSO edit mode, about 30K bytes are required for the 
EDIT routines. 


SMESSAGE 


See LMESSAGE option. 


SOURCE 


The SOURCE option specifies that the compiler is to include a source 
program listing in the compiler listing. The source program listed is 
either the original source input or, if the MACRO option applies, the 
output from the preprocessor. 


STMT 


The STMT option specifies that statements in the source program are to 
| be counted, and that the resulting statement numbers are to be used to 
identify statements in the listings resulting from the AGGREGATE, 
| ATTRIBUTES, LIST, OFFSET, SOURCE, and XREF options. If NOSTMT applies, 
NUMBER is implied. STMT is implied by NONUMBER or GOSTMT. 


STORAGE 


The STORAGE option specifies that the compiler is to include in the 
compiler listing a table giving the main storage requirements for the 
object module. 
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SYNTAX 


The SYNTAX option specifies that the compiler is to continue into syntax 
checking after initialization (or after preprocessing if the MACRO 
option applies) unless an unrecoverable error is detected. The NOSYNTAX 
option without an argument causes processing to stop unconditionally 
after initialization (or preprocessing). With an argument, continuation 
depends on the severity of errors: detected so far, as follows: 


NOSYNTAX (W) No syntax checking if a warning, error, severe error, 
or unrecoverable error is detected. 


NOSYNTAX (E) No syntax checking if an error, severe error, or 
unrecoverable error is detected. 


NOSYNTAX (S) No syntax checking if a severe error or unrecoverable 
error is detected. 


If the SOURCE option applies, the compiler will generate a source 
listing even if syntax checking is not performed. 


TERMINAL 


The TERMINAL option specifies that some or all of the compiler listing 
produced during compilation is to be printed at the terminal. If 
TERMINAL is specified without an argument, any diagnostic and 
informatory messages are printed at the terminal. You can add an 
argument, which takes the form of an option list, to specify other parts 
of the compiler listing that are to be printed at the terminal. 


The listing at the terminal is independent of that written on SYSPRINT. 
However, if SYSPRINT is associated with the terminal, only one copy of 
each option requested will be printed even if it is requested in the 
TERMINAL option and also as a first-level option. 


The following option keywords, their negative forms, or their 
abbreviated forms, can be specified in the option list for the TERMINAL 
option: 


AGGREGATE, ATTRIBUTES, DUMP, ESD, INSOURCE, LIST, MAP, OFFSET, OPTIONS, 
SOURCE, STORAGE, and XREF. 


The other options that relate to the listing (that is, FLAG, 
LMESSAGE/SMESSAGE, MARGINI, NEST, NUMBER, and STMT) will be the same as 
for the SYSPRINT listing. 


XREF 


The XREF option specifies that the compiler is to include in the 
compiler listing a list of all identifiers used in the PL/I program 
together with the numbers of the statements in which they are declared 
or referenced. The only exception is that label references on END 
statements are -not included. If both ATTRIBUTES and XREF apply, the two 
tables are combined, 
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